rogram stackuser ;
uses crt,stack;
begin
push(5);
pop;
        clrscr;
writeln(pop);
end.

while not empty do
writeln (pop);
end.
